home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / msdos / animutil / artform / trex.wbj < prev    next >
Unknown  |  1992-10-03  |  10.3 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% gt2 Kopftext: 'Tyrannosaurus Rex' default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 54 79 72 61 6e 6e 6f 73 | 61 75 72 75 73 20 52 65 |Tyrannos|aurus Re|
|00000010| 78 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |x. | |
|00000020| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 00 | | .|
|00000030| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00000040| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000050| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 00 | | .|
|00000060| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00000070| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000080| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 00 | | .|
|00000090| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|000000a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000000b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 00 | | .|
|000000c0| 0b 00 08 00 02 00 01 00 | 48 45 41 44 00 20 20 20 |........|HEAD. |
|000000d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000000e0| 20 20 20 20 20 20 20 20 | 56 00 00 00 0a 00 73 65 | |V.....se|
|000000f0| 74 20 54 53 20 3d 20 31 | 00 00 12 00 73 65 74 20 |t TS = 1|....set |
|00000100| 42 4f 44 59 42 45 4e 44 | 20 3d 20 36 30 f8 12 00 |BODYBEND| = 60...|
|00000110| 73 65 74 20 48 45 41 44 | 42 45 4e 44 20 3d 20 35 |set HEAD|BEND = 5|
|00000120| 30 f8 12 00 73 65 74 20 | 48 45 41 44 54 57 49 53 |0...set |HEADTWIS|
|00000130| 54 20 3d 20 30 f8 13 00 | 73 65 74 20 4e 45 43 4b |T = 0...|set NECK|
|00000140| 42 45 4e 44 20 3d 20 2d | 32 30 f8 11 00 73 65 74 |BEND = -|20...set|
|00000150| 20 4a 41 57 4f 50 45 4e | 20 3d 20 32 30 f8 13 00 | JAWOPEN| = 20...|
|00000160| 73 65 74 20 48 49 45 47 | 48 54 20 3d 20 35 30 30 |set HIEG|HT = 500|
|00000170| 2a 74 73 00 00 0e 00 73 | 68 69 66 74 20 59 2c 48 |*ts....s|hift Y,H|
|00000180| 49 45 47 48 54 17 00 70 | 6f 6c 61 72 20 58 2c 35 |IEGHT..p|olar X,5|
|00000190| 30 30 2a 54 53 2c 42 4f | 44 59 42 45 4e 44 09 00 |00*TS,BO|DYBEND..|
|000001a0| 63 61 6c 6c 20 4e 45 43 | 4b 22 00 70 6f 6c 61 72 |call NEC|K".polar|
|000001b0| 20 58 2c 34 30 30 2a 54 | 53 2c 42 4f 44 59 42 45 | X,400*T|S,BODYBE|
|000001c0| 4e 44 20 2b 20 4e 45 43 | 4b 42 45 4e 44 09 00 63 |ND + NEC|KBEND..c|
|000001d0| 61 6c 6c 20 48 45 41 44 | 09 00 63 61 6c 6c 20 4a |all HEAD|..call J|
|000001e0| 41 57 53 0a 00 63 61 6c | 6c 20 50 4c 41 54 45 03 |AWS..cal|l PLATE.|
|000001f0| 00 65 6e 64 00 00 0a 00 | 6c 61 62 65 6c 20 4e 45 |.end....|label NE|
|00000200| 43 4b 20 00 20 20 20 20 | 72 6f 74 61 74 65 20 58 |CK . |rotate X|
|00000210| 2c 42 4f 44 59 42 45 4e | 44 20 2b 20 4e 45 43 4b |,BODYBEN|D + NECK|
|00000220| 42 45 4e 44 37 00 20 20 | 20 20 63 79 6c 69 6e 64 |BEND7. | cylind|
|00000230| 65 72 20 59 2c 58 2c 5a | 2c 50 20 61 74 20 30 2c |er Y,X,Z|,P at 0,|
|00000240| 30 2c 30 20 73 69 7a 65 | 20 33 35 30 2a 54 53 2c |0,0 size| 350*TS,|
|00000250| 31 32 30 2a 54 53 2c 31 | 30 30 2a 54 53 00 00 0a |120*TS,1|00*TS...|
|00000260| 00 6c 61 62 65 6c 20 48 | 45 41 44 16 00 20 20 20 |.label H|EAD.. |
|00000270| 20 72 6f 74 61 74 65 20 | 59 2c 48 45 41 44 54 57 | rotate |Y,HEADTW|
|00000280| 49 53 54 2b 00 20 20 20 | 20 72 6f 74 61 74 65 20 |IST+. | rotate |
|00000290| 58 2c 42 4f 44 59 42 45 | 4e 44 20 2b 20 4e 45 43 |X,BODYBE|ND + NEC|
|000002a0| 4b 42 45 4e 44 20 2b 20 | 48 45 41 44 42 45 4e 44 |KBEND + |HEADBEND|
|000002b0| 0d 00 20 20 20 20 63 61 | 6c 6c 20 45 59 45 53 11 |.. ca|ll EYES.|
|000002c0| 00 20 20 20 20 72 61 64 | 69 61 6c 20 31 30 30 2a |. rad|ial 100*|
|000002d0| 54 53 1e 00 20 20 20 20 | 64 72 61 77 20 59 20 3d |TS.. |draw Y =|
|000002e0| 20 33 35 30 2a 54 53 20 | 74 6f 20 2d 31 32 30 2a | 350*TS |to -120*|
|000002f0| 54 53 31 00 20 20 20 20 | 20 20 20 20 69 66 20 59 |TS1. | if Y|
|00000300| 20 3c 20 30 20 6c 65 74 | 20 52 20 3d 20 31 2e 32 | < 0 let| R = 1.2|
|00000310| 35 20 2a 20 fb 28 28 31 | 32 30 2a 54 53 29 fd 20 |5 * .((1|20*TS). |
|00000320| 2d 20 59 fd 29 28 00 20 | 20 20 20 20 20 20 20 65 |- Y.)(. | e|
|00000330| 6c 73 65 20 69 66 20 59 | 20 3c 20 35 30 2a 54 53 |lse if Y| < 50*TS|
|00000340| 20 6c 65 74 20 52 20 3d | 20 31 35 30 2a 54 53 39 | let R =| 150*TS9|
|00000350| 00 20 20 20 20 20 20 20 | 20 65 6c 73 65 20 69 66 |. | else if|
|00000360| 20 59 20 3c 20 31 30 30 | 2a 54 53 20 6c 65 74 20 | Y < 100|*TS let |
|00000370| 52 20 3d 20 31 35 30 2a | 54 53 20 2d 20 28 59 2d |R = 150*|TS - (Y-|
|00000380| 35 30 2a 54 53 29 2a 30 | 2e 36 3a 00 20 20 20 20 |50*TS)*0|.6:. |
|00000390| 20 20 20 20 65 6c 73 65 | 20 69 66 20 59 20 3c 20 | else| if Y < |
|000003a0| 33 30 30 2a 54 53 20 6c | 65 74 20 52 20 3d 20 31 |300*TS l|et R = 1|
|000003b0| 32 30 2a 54 53 20 2d 20 | 28 59 2d 31 30 30 2a 54 |20*TS - |(Y-100*T|
|000003c0| 53 29 2a 30 2e 33 35 00 | 20 20 20 20 20 20 20 20 |S)*0.35.| |
|000003d0| 65 6c 73 65 20 6c 65 74 | 20 52 20 3d 20 31 2e 32 |else let| R = 1.2|
|000003e0| 20 2a 20 fb 28 28 35 30 | 2a 54 53 29 fd 20 20 2d | * .((50|*TS). -|
|000003f0| 20 28 59 2d 33 30 30 2a | 54 53 29 fd 29 10 00 20 | (Y-300*|TS).).. |
|00000400| 20 20 20 20 20 20 20 72 | 61 64 69 61 6c 20 52 1e | r|adial R.|
|00000410| 00 20 20 20 20 20 20 20 | 20 64 72 61 77 20 51 20 |. | draw Q |
|00000420| 3d 20 2d 31 30 35 f8 20 | 74 6f 20 31 30 35 f8 29 |= -105. |to 105.)|
|00000430| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 53 20 3d |. | S =|
|00000440| 20 30 2e 39 34 20 2d 20 | 30 2e 30 36 20 2a 20 63 | 0.94 - |0.06 * c|
|00000450| 6f 73 20 28 51 20 2a 20 | 38 29 19 00 20 20 20 20 |os (Q * |8).. |
|00000460| 20 20 20 20 20 20 20 20 | 58 20 3d 20 52 20 2a 20 | |X = R * |
|00000470| 73 69 6e 20 51 1d 00 20 | 20 20 20 20 20 20 20 20 |sin Q.. | |
|00000480| 20 20 20 5a 20 3d 20 52 | 20 2a 20 53 20 2a 20 63 | Z = R| * S * c|
|00000490| 6f 73 20 51 24 00 20 20 | 20 20 20 20 20 20 20 20 |os Q$. | |
|000004a0| 20 20 69 66 20 51 20 3c | 20 2d 31 30 30 f8 20 6f | if Q <| -100. o|
|000004b0| 72 20 51 20 3e 20 31 30 | 30 f8 1a 00 20 20 20 20 |r Q > 10|0... |
|000004c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 69 66 20 59 | | if Y|
|000004d0| 20 3e 20 31 30 30 1c 00 | 20 20 20 20 20 20 20 20 | > 100..| |
|000004e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 63 6f 6c 6f | | colo|
|000004f0| 72 20 31 32 14 00 20 20 | 20 20 20 20 20 20 20 20 |r 12.. | |
|00000500| 20 20 20 20 20 20 65 6c | 73 65 1b 00 20 20 20 20 | el|se.. |
|00000510| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000520| 63 6f 6c 6f 72 20 30 00 | 00 0a 00 6c 61 62 65 6c |color 0.|...label|
|00000530| 20 4a 41 57 53 16 00 20 | 20 20 20 72 6f 74 61 74 | JAWS.. | rotat|
|00000540| 65 20 59 2c 48 45 41 44 | 54 57 49 53 54 35 00 20 |e Y,HEAD|TWIST5. |
|00000550| 20 20 20 72 6f 74 61 74 | 65 20 58 2c 42 4f 44 59 | rotat|e X,BODY|
|00000560| 42 45 4e 44 20 2b 20 4e | 45 43 4b 42 45 4e 44 20 |BEND + N|ECKBEND |
|00000570| 2b 20 48 45 41 44 42 45 | 4e 44 20 2b 20 4a 41 57 |+ HEADBE|ND + JAW|
|00000580| 4f 50 45 4e 11 00 20 20 | 20 20 72 61 64 69 61 6c |OPEN.. | radial|
|00000590| 20 31 30 30 2a 54 53 18 | 00 20 20 20 20 64 72 61 | 100*TS.|. dra|
|000005a0| 77 20 59 20 3d 20 33 35 | 30 2a 54 53 20 74 6f 20 |w Y = 35|0*TS to |
|000005b0| 30 23 00 20 20 20 20 20 | 20 20 20 69 66 20 59 20 |0#. | if Y |
|000005c0| 3c 20 35 30 2a 54 53 20 | 6c 65 74 20 52 20 3d 20 |< 50*TS |let R = |
|000005d0| 31 35 30 2a 54 53 39 00 | 20 20 20 20 20 20 20 20 |150*TS9.| |
|000005e0| 65 6c 73 65 20 69 66 20 | 59 20 3c 20 31 30 30 2a |else if |Y < 100*|
|000005f0| 54 53 20 6c 65 74 20 52 | 20 3d 20 31 35 30 2a 54 |TS let R| = 150*T|
|00000600| 53 20 2d 20 28 59 2d 35 | 30 2a 54 53 29 2a 30 2e |S - (Y-5|0*TS)*0.|
|00000610| 36 3a 00 20 20 20 20 20 | 20 20 20 65 6c 73 65 20 |6:. | else |
|00000620| 69 66 20 59 20 3c 20 33 | 30 30 2a 54 53 20 6c 65 |if Y < 3|00*TS le|
|00000630| 74 20 52 20 3d 20 31 32 | 30 2a 54 53 20 2d 20 28 |t R = 12|0*TS - (|
|00000640| 59 2d 31 30 30 2a 54 53 | 29 2a 30 2e 33 35 00 20 |Y-100*TS|)*0.35. |
|00000650| 20 20 20 20 20 20 20 65 | 6c 73 65 20 6c 65 74 20 | e|lse let |
|00000660| 52 20 3d 20 31 2e 32 20 | 2a 20 fb 28 28 35 30 2a |R = 1.2 |* .((50*|
|00000670| 54 53 29 fd 20 20 2d 20 | 28 59 2d 33 30 30 2a 54 |TS). - |(Y-300*T|
|00000680| 53 29 fd 29 10 00 20 20 | 20 20 20 20 20 20 72 61 |S).).. | ra|
|00000690| 64 69 61 6c 20 52 1c 00 | 20 20 20 20 20 20 20 20 |dial R..| |
|000006a0| 64 72 61 77 20 51 20 3d | 20 2d 39 35 f8 20 74 6f |draw Q =| -95. to|
|000006b0| 20 39 35 f8 27 00 20 20 | 20 20 20 20 20 20 20 20 | 95.'. | |
|000006c0| 20 20 53 20 3d 20 30 2e | 38 20 2d 20 30 2e 32 20 | S = 0.|8 - 0.2 |
|000006d0| 2a 20 63 6f 73 20 28 51 | 20 2a 20 32 29 19 00 20 |* cos (Q| * 2).. |
|000006e0| 20 20 20 20 20 20 20 20 | 20 20 20 58 20 3d 20 52 | | X = R|
|000006f0| 20 2a 20 73 69 6e 20 51 | 1e 00 20 20 20 20 20 20 | * sin Q|.. |
|00000700| 20 20 20 20 20 20 5a 20 | 3d 20 2d 52 20 2a 20 53 | Z |= -R * S|
|00000710| 20 2a 20 63 6f 73 20 51 | 22 00 20 20 20 20 20 20 | * cos Q|". |
|00000720| 20 20 20 20 20 20 69 66 | 20 51 20 3c 20 2d 39 30 | if| Q < -90|
|00000730| f8 20 6f 72 20 51 20 3e | 20 39 30 f8 00 00 00 00 |. or Q >| 90.....|
|00000740| 00 00 00 00 00 00 0b 00 | 6c 61 62 65 6c 20 50 4c |........|label PL|
|00000750| 41 54 45 09 00 20 20 20 | 20 5a 20 3d 20 30 0c 00 |ATE.. | Z = 0..|
|00000760| 20 20 20 20 63 6f 6c 6f | 72 20 32 32 16 00 20 20 | colo|r 22.. |
|00000770| 20 20 72 6f 74 61 74 65 | 20 59 2c 48 45 41 44 54 | rotate| Y,HEADT|
|00000780| 57 49 53 54 35 00 20 20 | 20 20 72 6f 74 61 74 65 |WIST5. | rotate|
|00000790| 20 58 2c 42 4f 44 59 42 | 45 4e 44 20 2b 20 4e 45 | X,BODYB|END + NE|
|000007a0| 43 4b 42 45 4e 44 20 2b | 20 48 45 41 44 42 45 4e |CKBEND +| HEADBEN|
|000007b0| 44 20 2b 20 4a 41 57 4f | 50 45 4e 18 00 20 20 20 |D + JAWO|PEN.. |
|000007c0| 20 64 72 61 77 20 59 20 | 3d 20 30 20 74 6f 20 33 | draw Y |= 0 to 3|
|000007d0| 34 35 2a 54 53 23 00 20 | 20 20 20 20 20 20 20 69 |45*TS#. | i|
|000007e0| 66 20 59 20 3c 20 35 30 | 2a 54 53 20 6c 65 74 20 |f Y < 50|*TS let |
|000007f0| 52 20 3d 20 31 35 30 2a | 54 53 39 00 20 20 20 20 |R = 150*|TS9. |
|00000800| 20 20 20 20 65 6c 73 65 | 20 69 66 20 59 20 3c 20 | else| if Y < |
|00000810| 31 30 30 2a 54 53 20 6c | 65 74 20 52 20 3d 20 31 |100*TS l|et R = 1|
|00000820| 35 30 2a 54 53 20 2d 20 | 28 59 2d 35 30 2a 54 53 |50*TS - |(Y-50*TS|
|00000830| 29 2a 30 2e 36 3a 00 20 | 20 20 20 20 20 20 20 65 |)*0.6:. | e|
|00000840| 6c 73 65 20 69 66 20 59 | 20 3c 20 33 30 30 2a 54 |lse if Y| < 300*T|
|00000850| 53 20 6c 65 74 20 52 20 | 3d 20 31 32 30 2a 54 53 |S let R |= 120*TS|
|00000860| 20 2d 20 28 59 2d 31 30 | 30 2a 54 53 29 2a 30 2e | - (Y-10|0*TS)*0.|
|00000870| 33 35 00 20 20 20 20 20 | 20 20 20 65 6c 73 65 20 |35. | else |
|00000880| 6c 65 74 20 52 20 3d 20 | 31 2e 32 20 2a 20 fb 28 |let R = |1.2 * .(|
|00000890| 28 35 30 2a 54 53 29 fd | 20 20 2d 20 28 59 2d 33 |(50*TS).| - (Y-3|
|000008a0| 30 30 2a 54 53 29 fd 29 | 13 00 20 20 20 20 20 20 |00*TS).)|.. |
|000008b0| 20 20 52 20 3d 20 52 20 | 2a 20 30 2e 38 18 00 20 | R = R |* 0.8.. |
|000008c0| 20 20 20 20 20 20 20 64 | 72 61 77 20 58 20 3d 20 | d|raw X = |
|000008d0| 2d 52 20 74 6f 20 52 00 | 00 0a 00 6c 61 62 65 6c |-R to R.|...label|
|000008e0| 20 45 59 45 53 0c 00 20 | 20 20 20 63 6f 6c 6f 72 | EYES.. | color|
|000008f0| 20 31 32 30 00 20 20 20 | 20 73 70 68 65 72 65 20 | 120. | sphere |
|00000900| 50 2c 51 20 61 74 20 2d | 31 31 30 2a 54 53 2c 38 |P,Q at -|110*TS,8|
|00000910| 30 2a 54 53 2c 36 30 2a | 54 53 20 73 69 7a 65 20 |0*TS,60*|TS size |
|00000920| 33 30 2a 54 53 13 00 20 | 20 20 20 20 20 20 20 69 |30*TS.. | i|
|00000930| 66 20 51 20 3e 20 36 30 | f8 20 13 00 20 20 20 20 |f Q > 60|. .. |
|00000940| 20 20 20 20 20 20 20 20 | 63 6f 6c 6f 72 20 32 2f | |color 2/|
|00000950| 00 20 20 20 20 73 70 68 | 65 72 65 20 50 2c 51 20 |. sph|ere P,Q |
|00000960| 61 74 20 31 31 30 2a 54 | 53 2c 38 30 2a 54 53 2c |at 110*T|S,80*TS,|
|00000970| 36 30 2a 54 53 20 73 69 | 7a 65 20 33 30 2a 54 53 |60*TS si|ze 30*TS|
|00000980| 13 00 20 20 20 20 20 20 | 20 20 69 66 20 51 20 3e |.. | if Q >|
|00000990| 20 36 30 f8 20 13 00 20 | 20 20 20 20 20 20 20 20 | 60. .. | |
|000009a0| 20 20 20 63 6f 6c 6f 72 | 20 32 42 4f 44 59 00 20 | color| 2BODY. |
|000009b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000009c0| 20 20 20 20 20 20 20 20 | 20 20 11 00 00 00 0e 00 | | ......|
|000009d0| 73 68 69 66 74 20 59 2c | 48 49 45 47 48 54 11 00 |shift Y,|HIEGHT..|
|000009e0| 72 6f 74 61 74 65 20 58 | 2c 42 4f 44 59 42 45 4e |rotate X|,BODYBEN|
|000009f0| 44 0d 00 63 61 6c 6c 20 | 53 48 4f 55 4c 44 45 52 |D..call |SHOULDER|
|00000a00| 0a 00 63 61 6c 6c 20 54 | 52 55 4e 4b 0a 00 63 61 |..call T|RUNK..ca|
|00000a10| 6c 6c 20 47 52 4f 49 4e | 03 00 65 6e 64 00 00 0e |ll GROIN|..end...|
|00000a20| 00 6c 61 62 65 6c 20 53 | 48 4f 55 4c 44 45 52 14 |.label S|HOULDER.|
|00000a30| 00 20 20 20 20 73 68 69 | 66 74 20 59 2c 35 30 30 |. shi|ft Y,500|
|00000a40| 20 2a 20 54 53 23 00 20 | 20 20 20 73 70 68 65 72 | * TS#. | spher|
|00000a50| 65 20 50 2c 51 20 61 74 | 20 30 2c 30 2c 30 20 73 |e P,Q at| 0,0,0 s|
|00000a60| 69 7a 65 20 31 35 30 2a | 54 53 00 00 0b 00 6c 61 |ize 150*|TS....la|
|00000a70| 62 65 6c 20 54 52 55 4e | 4b 37 00 20 20 20 20 63 |bel TRUN|K7. c|
|00000a80| 79 6c 69 6e 64 65 72 20 | 59 2c 58 2c 5a 2c 51 20 |ylinder |Y,X,Z,Q |
|00000a90| 61 74 20 30 2c 30 2c 30 | 20 73 69 7a 65 20 35 30 |at 0,0,0| size 50|
|00000aa0| 30 2a 54 53 2c 32 30 30 | 2a 54 53 2c 31 35 30 2a |0*TS,200|*TS,150*|
|00000ab0| 54 53 00 00 0b 00 6c 61 | 62 65 6c 20 47 52 4f 49 |TS....la|bel GROI|
|00000ac0| 4e 23 00 20 20 20 20 73 | 70 68 65 72 65 20 50 2c |N#. s|phere P,|
|00000ad0| 51 20 61 74 20 30 2c 30 | 2c 30 20 73 69 7a 65 20 |Q at 0,0|,0 size |
|00000ae0| 32 30 30 2a 54 53 4c 45 | 47 20 4c 45 46 54 00 20 |200*TSLE|G LEFT. |
|00000af0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000b00| 20 20 20 20 20 20 27 00 | 00 00 0f 00 73 65 74 20 | '.|....set |
|00000b10| 4c 45 47 4f 55 54 20 3d | 20 30 f8 12 00 73 65 74 |LEGOUT =| 0...set|
|00000b20| 20 4c 45 47 54 57 49 53 | 54 20 3d 20 32 30 f8 00 | LEGTWIS|T = 20..|
|00000b30| 00 12 00 73 65 74 20 4c | 45 46 54 4c 45 47 20 3d |...set L|EFTLEG =|
|00000b40| 20 2d 35 30 f8 12 00 73 | 65 74 20 4c 45 46 54 4b | -50...s|et LEFTK|
|00000b50| 4e 45 45 20 3d 20 37 30 | f8 0f 00 73 65 74 20 48 |NEE = 70|...set H|
|00000b60| 49 50 4c 45 46 54 20 3d | 20 30 00 00 18 00 73 68 |IPLEFT =| 0....sh|
|00000b70| 69 66 74 20 59 2c 48 49 | 50 4c 45 46 54 20 2b 20 |ift Y,HI|PLEFT + |
|00000b80| 48 49 45 47 48 54 0e 00 | 73 68 69 66 74 20 58 2c |HIEGHT..|shift X,|
|00000b90| 31 35 30 2a 54 53 10 00 | 72 6f 74 61 74 65 20 5a |150*TS..|rotate Z|
|00000ba0| 2c 2d 4c 45 47 4f 55 54 | 11 00 72 6f 74 61 74 65 |,-LEGOUT|..rotate|
|00000bb0| 20 59 2c 4c 45 47 54 57 | 49 53 54 0a 00 63 61 6c | Y,LEGTW|IST..cal|
|00000bc0| 6c 20 55 50 50 45 52 0a | 00 63 61 6c 6c 20 4c 4f |l UPPER.|.call LO|
|00000bd0| 57 45 52 09 00 63 61 6c | 6c 20 46 4f 4f 54 03 00 |WER..cal|l FOOT..|
|00000be0| 65 6e 64 00 00 0b 00 6c | 61 62 65 6c 20 55 50 50 |end....l|abel UPP|
|00000bf0| 45 52 23 00 20 20 20 20 | 73 70 68 65 72 65 20 50 |ER#. |sphere P|
|00000c00| 2c 51 20 61 74 20 30 2c | 30 2c 30 20 73 69 7a 65 |,Q at 0,|0,0 size|
|00000c10| 20 31 32 30 2a 54 53 14 | 00 20 20 20 20 72 6f 74 | 120*TS.|. rot|
|00000c20| 61 74 65 20 58 2c 4c 45 | 46 54 4c 45 47 37 00 20 |ate X,LE|FTLEG7. |
|00000c30| 20 20 20 63 79 6c 69 6e | 64 65 72 20 59 2c 58 2c | cylin|der Y,X,|
|00000c40| 5a 2c 51 20 61 74 20 30 | 2c 30 2c 30 20 73 69 7a |Z,Q at 0|,0,0 siz|
|00000c50| 65 20 2d 33 30 30 2a 54 | 53 2c 31 32 30 2a 54 53 |e -300*T|S,120*TS|
|00000c60| 2c 38 30 2a 54 53 00 00 | 0b 00 6c 61 62 65 6c 20 |,80*TS..|..label |
|00000c70| 4c 4f 57 45 52 1b 00 20 | 20 20 20 70 6f 6c 61 72 |LOWER.. | polar|
|00000c80| 20 58 2c 2d 33 30 30 2a | 54 53 2c 4c 45 46 54 4c | X,-300*|TS,LEFTL|
|00000c90| 45 47 22 00 20 20 20 20 | 73 70 68 65 72 65 20 50 |EG". |sphere P|
|00000ca0| 2c 51 20 61 74 20 30 2c | 30 2c 30 20 73 69 7a 65 |,Q at 0,|0,0 size|
|00000cb0| 20 38 30 2a 54 53 1f 00 | 20 20 20 20 72 6f 74 61 | 80*TS..| rota|
|00000cc0| 74 65 20 58 2c 4c 45 46 | 54 4b 4e 45 45 20 2b 20 |te X,LEF|TKNEE + |
|00000cd0| 4c 45 46 54 4c 45 47 36 | 00 20 20 20 20 63 79 6c |LEFTLEG6|. cyl|
|00000ce0| 69 6e 64 65 72 20 59 2c | 58 2c 5a 2c 51 20 61 74 |inder Y,|X,Z,Q at|
|00000cf0| 20 30 2c 30 2c 30 20 73 | 69 7a 65 20 2d 34 30 30 | 0,0,0 s|ize -400|
|00000d00| 2a 54 53 2c 38 30 2a 54 | 53 2c 34 30 2a 54 53 00 |*TS,80*T|S,40*TS.|
|00000d10| 00 0a 00 6c 61 62 65 6c | 20 46 4f 4f 54 1b 00 20 |...label| FOOT.. |
|00000d20| 20 20 20 70 6f 6c 61 72 | 20 58 2c 2d 33 30 30 2a | polar| X,-300*|
|00000d30| 54 53 2c 4c 45 46 54 4c | 45 47 26 00 20 20 20 20 |TS,LEFTL|EG&. |
|00000d40| 70 6f 6c 61 72 20 58 2c | 2d 34 30 30 2a 54 53 2c |polar X,|-400*TS,|
|00000d50| 4c 45 46 54 4b 4e 45 45 | 20 2b 20 4c 45 46 54 4c |LEFTKNEE| + LEFTL|
|00000d60| 45 47 22 00 20 20 20 20 | 73 70 68 65 72 65 20 50 |EG". |sphere P|
|00000d70| 2c 51 20 61 74 20 30 2c | 30 2c 30 20 73 69 7a 65 |,Q at 0,|0,0 size|
|00000d80| 20 34 30 2a 54 53 25 00 | 20 20 20 20 72 6f 74 61 | 40*TS%.| rota|
|00000d90| 74 65 20 58 2c 28 4c 45 | 46 54 4b 4e 45 45 20 2b |te X,(LE|FTKNEE +|
|00000da0| 20 4c 45 46 54 4c 45 47 | 29 20 2f 20 32 20 00 20 | LEFTLEG|) / 2 . |
|00000db0| 20 20 20 66 6f 72 20 41 | 20 3d 20 2d 31 30 f8 20 | for A| = -10. |
|00000dc0| 74 6f 20 33 30 f8 20 73 | 74 65 70 20 32 30 f8 12 |to 30. s|tep 20..|
|00000dd0| 00 20 20 20 20 20 20 20 | 20 72 6f 74 61 74 65 20 |. | rotate |
|00000de0| 59 2c 41 3a 00 20 20 20 | 20 20 20 20 20 63 79 6c |Y,A:. | cyl|
|00000df0| 69 6e 64 65 72 20 5a 2c | 58 2c 59 2c 50 20 61 74 |inder Z,|X,Y,P at|
|00000e00| 20 30 2c 30 2c 30 20 73 | 69 7a 65 20 2d 32 30 30 | 0,0,0 s|ize -200|
|00000e10| 2a 54 53 2c 34 30 2a 54 | 53 2c 32 30 2a 54 53 17 |*TS,40*T|S,20*TS.|
|00000e20| 00 20 20 20 20 20 20 20 | 20 73 68 69 66 74 20 5a |. | shift Z|
|00000e30| 2c 2d 32 30 30 2a 54 53 | 14 00 20 20 20 20 20 20 |,-200*TS|.. |
|00000e40| 20 20 72 6f 74 61 74 65 | 20 58 2c 32 30 f8 36 00 | rotate| X,20.6.|
|00000e50| 20 20 20 20 20 20 20 20 | 63 79 6c 69 6e 64 65 72 | |cylinder|
|00000e60| 20 5a 2c 58 2c 59 2c 50 | 20 61 74 20 30 2c 30 2c | Z,X,Y,P| at 0,0,|
|00000e70| 30 20 73 69 7a 65 20 2d | 31 30 30 2a 54 53 2c 32 |0 size -|100*TS,2|
|00000e80| 30 2a 54 53 2c 30 4c 45 | 47 20 52 49 47 48 54 00 |0*TS,0LE|G RIGHT.|
|00000e90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000ea0| 20 20 20 20 20 20 24 00 | 00 00 13 00 73 65 74 20 | $.|....set |
|00000eb0| 52 49 47 48 54 4c 45 47 | 20 3d 20 2d 35 30 f8 13 |RIGHTLEG| = -50..|
|00000ec0| 00 73 65 74 20 52 49 47 | 48 54 4b 4e 45 45 20 3d |.set RIG|HTKNEE =|
|00000ed0| 20 37 30 f8 10 00 73 65 | 74 20 48 49 50 52 49 47 | 70...se|t HIPRIG|
|00000ee0| 48 54 20 3d 20 30 00 00 | 19 00 73 68 69 66 74 20 |HT = 0..|..shift |
|00000ef0| 59 2c 48 49 50 52 49 47 | 48 54 20 2b 20 48 49 45 |Y,HIPRIG|HT + HIE|
|00000f00| 47 48 54 0f 00 73 68 69 | 66 74 20 58 2c 2d 31 35 |GHT..shi|ft X,-15|
|00000f10| 30 2a 54 53 0f 00 72 6f | 74 61 74 65 20 5a 2c 4c |0*TS..ro|tate Z,L|
|00000f20| 45 47 4f 55 54 12 00 72 | 6f 74 61 74 65 20 59 2c |EGOUT..r|otate Y,|
|00000f30| 2d 4c 45 47 54 57 49 53 | 54 0a 00 63 61 6c 6c 20 |-LEGTWIS|T..call |
|00000f40| 55 50 50 45 52 0a 00 63 | 61 6c 6c 20 4c 4f 57 45 |UPPER..c|all LOWE|
|00000f50| 52 09 00 63 61 6c 6c 20 | 46 4f 4f 54 03 00 65 6e |R..call |FOOT..en|
|00000f60| 64 00 00 0b 00 6c 61 62 | 65 6c 20 55 50 50 45 52 |d....lab|el UPPER|
|00000f70| 23 00 20 20 20 20 73 70 | 68 65 72 65 20 50 2c 51 |#. sp|here P,Q|
|00000f80| 20 61 74 20 30 2c 30 2c | 30 20 73 69 7a 65 20 31 | at 0,0,|0 size 1|
|00000f90| 32 30 2a 54 53 15 00 20 | 20 20 20 72 6f 74 61 74 |20*TS.. | rotat|
|00000fa0| 65 20 58 2c 52 49 47 48 | 54 4c 45 47 37 00 20 20 |e X,RIGH|TLEG7. |
|00000fb0| 20 20 63 79 6c 69 6e 64 | 65 72 20 59 2c 58 2c 5a | cylind|er Y,X,Z|
|00000fc0| 2c 51 20 61 74 20 30 2c | 30 2c 30 20 73 69 7a 65 |,Q at 0,|0,0 size|
|00000fd0| 20 2d 33 30 30 2a 54 53 | 2c 31 32 30 2a 54 53 2c | -300*TS|,120*TS,|
|00000fe0| 38 30 2a 54 53 00 00 0b | 00 6c 61 62 65 6c 20 4c |80*TS...|.label L|
|00000ff0| 4f 57 45 52 1c 00 20 20 | 20 20 70 6f 6c 61 72 20 |OWER.. | polar |
|00001000| 58 2c 2d 33 30 30 2a 54 | 53 2c 52 49 47 48 54 4c |X,-300*T|S,RIGHTL|
|00001010| 45 47 22 00 20 20 20 20 | 73 70 68 65 72 65 20 50 |EG". |sphere P|
|00001020| 2c 51 20 61 74 20 30 2c | 30 2c 30 20 73 69 7a 65 |,Q at 0,|0,0 size|
|00001030| 20 38 30 2a 54 53 21 00 | 20 20 20 20 72 6f 74 61 | 80*TS!.| rota|
|00001040| 74 65 20 58 2c 52 49 47 | 48 54 4b 4e 45 45 20 2b |te X,RIG|HTKNEE +|
|00001050| 20 52 49 47 48 54 4c 45 | 47 36 00 20 20 20 20 63 | RIGHTLE|G6. c|
|00001060| 79 6c 69 6e 64 65 72 20 | 59 2c 58 2c 5a 2c 51 20 |ylinder |Y,X,Z,Q |
|00001070| 61 74 20 30 2c 30 2c 30 | 20 73 69 7a 65 20 2d 34 |at 0,0,0| size -4|
|00001080| 30 30 2a 54 53 2c 38 30 | 2a 54 53 2c 34 30 2a 54 |00*TS,80|*TS,40*T|
|00001090| 53 00 00 0a 00 6c 61 62 | 65 6c 20 46 4f 4f 54 1c |S....lab|el FOOT.|
|000010a0| 00 20 20 20 20 70 6f 6c | 61 72 20 58 2c 2d 33 30 |. pol|ar X,-30|
|000010b0| 30 2a 54 53 2c 52 49 47 | 48 54 4c 45 47 28 00 20 |0*TS,RIG|HTLEG(. |
|000010c0| 20 20 20 70 6f 6c 61 72 | 20 58 2c 2d 34 30 30 2a | polar| X,-400*|
|000010d0| 54 53 2c 52 49 47 48 54 | 4b 4e 45 45 20 2b 20 52 |TS,RIGHT|KNEE + R|
|000010e0| 49 47 48 54 4c 45 47 22 | 00 20 20 20 20 73 70 68 |IGHTLEG"|. sph|
|000010f0| 65 72 65 20 50 2c 51 20 | 61 74 20 30 2c 30 2c 30 |ere P,Q |at 0,0,0|
|00001100| 20 73 69 7a 65 20 34 30 | 2a 54 53 27 00 20 20 20 | size 40|*TS'. |
|00001110| 20 72 6f 74 61 74 65 20 | 58 2c 28 52 49 47 48 54 | rotate |X,(RIGHT|
|00001120| 4b 4e 45 45 20 2b 20 52 | 49 47 48 54 4c 45 47 29 |KNEE + R|IGHTLEG)|
|00001130| 20 2f 20 32 21 00 20 20 | 20 20 66 6f 72 20 41 20 | / 2!. | for A |
|00001140| 3d 20 31 30 f8 20 74 6f | 20 2d 33 30 f8 20 73 74 |= 10. to| -30. st|
|00001150| 65 70 20 2d 32 30 f8 12 | 00 20 20 20 20 20 20 20 |ep -20..|. |
|00001160| 20 72 6f 74 61 74 65 20 | 59 2c 41 3a 00 20 20 20 | rotate |Y,A:. |
|00001170| 20 20 20 20 20 63 79 6c | 69 6e 64 65 72 20 5a 2c | cyl|inder Z,|
|00001180| 58 2c 59 2c 51 20 61 74 | 20 30 2c 30 2c 30 20 73 |X,Y,Q at| 0,0,0 s|
|00001190| 69 7a 65 20 2d 32 30 30 | 2a 54 53 2c 34 30 2a 54 |ize -200|*TS,40*T|
|000011a0| 53 2c 32 30 2a 54 53 17 | 00 20 20 20 20 20 20 20 |S,20*TS.|. |
|000011b0| 20 73 68 69 66 74 20 5a | 2c 2d 32 30 30 2a 54 53 | shift Z|,-200*TS|
|000011c0| 14 00 20 20 20 20 20 20 | 20 20 72 6f 74 61 74 65 |.. | rotate|
|000011d0| 20 58 2c 32 30 f8 36 00 | 20 20 20 20 20 20 20 20 | X,20.6.| |
|000011e0| 63 79 6c 69 6e 64 65 72 | 20 5a 2c 58 2c 59 2c 51 |cylinder| Z,X,Y,Q|
|000011f0| 20 61 74 20 30 2c 30 2c | 30 20 73 69 7a 65 20 2d | at 0,0,|0 size -|
|00001200| 31 30 30 2a 54 53 2c 32 | 30 2a 54 53 2c 30 41 52 |100*TS,2|0*TS,0AR|
|00001210| 4d 20 4c 45 46 54 00 20 | 20 20 20 20 20 20 20 20 |M LEFT. | |
|00001220| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 28 00 | | (.|
|00001230| 00 00 10 00 73 65 74 20 | 41 52 4d 4f 55 54 20 3d |....set |ARMOUT =|
|00001240| 20 31 30 f8 12 00 73 65 | 74 20 4c 41 52 4d 54 57 | 10...se|t LARMTW|
|00001250| 49 53 54 20 3d 20 30 f8 | 10 00 73 65 74 20 4c 45 |IST = 0.|..set LE|
|00001260| 46 54 41 52 4d 20 3d 20 | 30 f8 14 00 73 65 74 20 |FTARM = |0...set |
|00001270| 4c 45 46 54 45 4c 42 4f | 57 20 3d 20 2d 36 30 f8 |LEFTELBO|W = -60.|
|00001280| 00 00 0e 00 73 68 69 66 | 74 20 59 2c 48 49 45 47 |....shif|t Y,HIEG|
|00001290| 48 54 17 00 70 6f 6c 61 | 72 20 58 2c 35 30 30 2a |HT..pola|r X,500*|
|000012a0| 54 53 2c 42 4f 44 59 42 | 45 4e 44 0e 00 73 68 69 |TS,BODYB|END..shi|
|000012b0| 66 74 20 58 2c 31 33 30 | 2a 54 53 10 00 72 6f 74 |ft X,130|*TS..rot|
|000012c0| 61 74 65 20 5a 2c 2d 41 | 52 4d 4f 55 54 12 00 72 |ate Z,-A|RMOUT..r|
|000012d0| 6f 74 61 74 65 20 59 2c | 4c 41 52 4d 54 57 49 53 |otate Y,|LARMTWIS|
|000012e0| 54 00 00 0a 00 63 61 6c | 6c 20 55 50 50 45 52 0a |T....cal|l UPPER.|
|000012f0| 00 63 61 6c 6c 20 4c 4f | 57 45 52 09 00 63 61 6c |.call LO|WER..cal|
|00001300| 6c 20 48 41 4e 44 03 00 | 65 6e 64 00 00 0b 00 6c |l HAND..|end....l|
|00001310| 61 62 65 6c 20 55 50 50 | 45 52 22 00 20 20 20 20 |abel UPP|ER". |
|00001320| 73 70 68 65 72 65 20 50 | 2c 51 20 61 74 20 30 2c |sphere P|,Q at 0,|
|00001330| 30 2c 30 20 73 69 7a 65 | 20 35 30 2a 54 53 14 00 |0,0 size| 50*TS..|
|00001340| 20 20 20 20 72 6f 74 61 | 74 65 20 58 2c 4c 45 46 | rota|te X,LEF|
|00001350| 54 41 52 4d 36 00 20 20 | 20 20 63 79 6c 69 6e 64 |TARM6. | cylind|
|00001360| 65 72 20 59 2c 58 2c 5a | 2c 51 20 61 74 20 30 2c |er Y,X,Z|,Q at 0,|
|00001370| 30 2c 30 20 73 69 7a 65 | 20 2d 31 36 30 2a 54 53 |0,0 size| -160*TS|
|00001380| 2c 35 30 2a 54 53 2c 33 | 30 2a 54 53 00 00 0b 00 |,50*TS,3|0*TS....|
|00001390| 6c 61 62 65 6c 20 4c 4f | 57 45 52 1b 00 20 20 20 |label LO|WER.. |
|000013a0| 20 70 6f 6c 61 72 20 58 | 2c 2d 31 36 30 2a 54 53 | polar X|,-160*TS|
|000013b0| 2c 4c 45 46 54 41 52 4d | 22 00 20 20 20 20 73 70 |,LEFTARM|". sp|
|000013c0| 68 65 72 65 20 50 2c 51 | 20 61 74 20 30 2c 30 2c |here P,Q| at 0,0,|
|000013d0| 30 20 73 69 7a 65 20 33 | 30 2a 54 53 20 00 20 20 |0 size 3|0*TS . |
|000013e0| 20 20 72 6f 74 61 74 65 | 20 58 2c 4c 45 46 54 45 | rotate| X,LEFTE|
|000013f0| 4c 42 4f 57 20 2b 20 4c | 45 46 54 41 52 4d 36 00 |LBOW + L|EFTARM6.|
|00001400| 20 20 20 20 63 79 6c 69 | 6e 64 65 72 20 59 2c 58 | cyli|nder Y,X|
|00001410| 2c 5a 2c 51 20 61 74 20 | 30 2c 30 2c 30 20 73 69 |,Z,Q at |0,0,0 si|
|00001420| 7a 65 20 2d 31 36 30 2a | 54 53 2c 33 30 2a 54 53 |ze -160*|TS,30*TS|
|00001430| 2c 32 30 2a 54 53 00 00 | 0a 00 6c 61 62 65 6c 20 |,20*TS..|..label |
|00001440| 48 41 4e 44 1b 00 20 20 | 20 20 70 6f 6c 61 72 20 |HAND.. | polar |
|00001450| 58 2c 2d 31 36 30 2a 54 | 53 2c 4c 45 46 54 41 52 |X,-160*T|S,LEFTAR|
|00001460| 4d 27 00 20 20 20 20 70 | 6f 6c 61 72 20 58 2c 2d |M'. p|olar X,-|
|00001470| 31 36 30 2a 54 53 2c 4c | 45 46 54 45 4c 42 4f 57 |160*TS,L|EFTELBOW|
|00001480| 20 2b 20 4c 45 46 54 41 | 52 4d 22 00 20 20 20 20 | + LEFTA|RM". |
|00001490| 73 70 68 65 72 65 20 50 | 2c 51 20 61 74 20 30 2c |sphere P|,Q at 0,|
|000014a0| 30 2c 30 20 73 69 7a 65 | 20 32 30 2a 54 53 20 00 |0,0 size| 20*TS .|
|000014b0| 20 20 20 20 72 6f 74 61 | 74 65 20 58 2c 4c 45 46 | rota|te X,LEF|
|000014c0| 54 45 4c 42 4f 57 20 2b | 20 4c 45 46 54 41 52 4d |TELBOW +| LEFTARM|
|000014d0| 10 00 20 20 20 20 72 6f | 74 61 74 65 20 59 2c 39 |.. ro|tate Y,9|
|000014e0| 30 f8 20 00 20 20 20 20 | 66 6f 72 20 41 20 3d 20 |0. . |for A = |
|000014f0| 2d 32 30 f8 20 74 6f 20 | 32 30 f8 20 73 74 65 70 |-20. to |20. step|
|00001500| 20 32 30 f8 12 00 20 20 | 20 20 20 20 20 20 72 6f | 20... | ro|
|00001510| 74 61 74 65 20 5a 2c 41 | 39 00 20 20 20 20 20 20 |tate Z,A|9. |
|00001520| 20 20 63 79 6c 69 6e 64 | 65 72 20 59 2c 58 2c 5a | cylind|er Y,X,Z|
|00001530| 2c 51 20 61 74 20 30 2c | 30 2c 30 20 73 69 7a 65 |,Q at 0,|0,0 size|
|00001540| 20 2d 38 30 2a 54 53 2c | 32 30 2a 54 53 2c 31 30 | -80*TS,|20*TS,10|
|00001550| 2a 54 53 16 00 20 20 20 | 20 20 20 20 20 73 68 69 |*TS.. | shi|
|00001560| 66 74 20 59 2c 2d 38 30 | 2a 54 53 14 00 20 20 20 |ft Y,-80|*TS.. |
|00001570| 20 20 20 20 20 72 6f 74 | 61 74 65 20 58 2c 33 30 | rot|ate X,30|
|00001580| f8 35 00 20 20 20 20 20 | 20 20 20 63 79 6c 69 6e |.5. | cylin|
|00001590| 64 65 72 20 59 2c 58 2c | 5a 2c 51 20 61 74 20 30 |der Y,X,|Z,Q at 0|
|000015a0| 2c 30 2c 30 20 73 69 7a | 65 20 2d 36 30 2a 54 53 |,0,0 siz|e -60*TS|
|000015b0| 2c 31 30 2a 54 53 2c 30 | 41 52 4d 20 52 49 47 48 |,10*TS,0|ARM RIGH|
|000015c0| 54 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |T. | |
|000015d0| 20 20 20 20 20 20 20 20 | 27 00 00 00 11 00 73 65 | |'.....se|
|000015e0| 74 20 52 49 47 48 54 41 | 52 4d 20 3d 20 30 f8 15 |t RIGHTA|RM = 0..|
|000015f0| 00 73 65 74 20 52 49 47 | 48 54 45 4c 42 4f 57 20 |.set RIG|HTELBOW |
|00001600| 3d 20 2d 36 30 f8 12 00 | 73 65 74 20 52 41 52 4d |= -60...|set RARM|
|00001610| 54 57 49 53 54 20 3d 20 | 30 f8 00 00 0e 00 73 68 |TWIST = |0.....sh|
|00001620| 69 66 74 20 59 2c 48 49 | 45 47 48 54 17 00 70 6f |ift Y,HI|EGHT..po|
|00001630| 6c 61 72 20 58 2c 35 30 | 30 2a 54 53 2c 42 4f 44 |lar X,50|0*TS,BOD|
|00001640| 59 42 45 4e 44 0f 00 73 | 68 69 66 74 20 58 2c 2d |YBEND..s|hift X,-|
|00001650| 31 33 30 2a 54 53 0f 00 | 72 6f 74 61 74 65 20 5a |130*TS..|rotate Z|
|00001660| 2c 41 52 4d 4f 55 54 12 | 00 72 6f 74 61 74 65 20 |,ARMOUT.|.rotate |
|00001670| 59 2c 52 41 52 4d 54 57 | 49 53 54 00 00 0a 00 63 |Y,RARMTW|IST....c|
|00001680| 61 6c 6c 20 55 50 50 45 | 52 0a 00 63 61 6c 6c 20 |all UPPE|R..call |
|00001690| 4c 4f 57 45 52 09 00 63 | 61 6c 6c 20 48 41 4e 44 |LOWER..c|all HAND|
|000016a0| 03 00 65 6e 64 00 00 0b | 00 6c 61 62 65 6c 20 55 |..end...|.label U|
|000016b0| 50 50 45 52 22 00 20 20 | 20 20 73 70 68 65 72 65 |PPER". | sphere|
|000016c0| 20 50 2c 51 20 61 74 20 | 30 2c 30 2c 30 20 73 69 | P,Q at |0,0,0 si|
|000016d0| 7a 65 20 35 30 2a 54 53 | 15 00 20 20 20 20 72 6f |ze 50*TS|.. ro|
|000016e0| 74 61 74 65 20 58 2c 52 | 49 47 48 54 41 52 4d 36 |tate X,R|IGHTARM6|
|000016f0| 00 20 20 20 20 63 79 6c | 69 6e 64 65 72 20 59 2c |. cyl|inder Y,|
|00001700| 58 2c 5a 2c 51 20 61 74 | 20 30 2c 30 2c 30 20 73 |X,Z,Q at| 0,0,0 s|
|00001710| 69 7a 65 20 2d 31 36 30 | 2a 54 53 2c 35 30 2a 54 |ize -160|*TS,50*T|
|00001720| 53 2c 33 30 2a 54 53 00 | 00 0b 00 6c 61 62 65 6c |S,30*TS.|...label|
|00001730| 20 4c 4f 57 45 52 1c 00 | 20 20 20 20 70 6f 6c 61 | LOWER..| pola|
|00001740| 72 20 58 2c 2d 31 36 30 | 2a 54 53 2c 52 49 47 48 |r X,-160|*TS,RIGH|
|00001750| 54 41 52 4d 22 00 20 20 | 20 20 73 70 68 65 72 65 |TARM". | sphere|
|00001760| 20 50 2c 51 20 61 74 20 | 30 2c 30 2c 30 20 73 69 | P,Q at |0,0,0 si|
|00001770| 7a 65 20 33 30 2a 54 53 | 22 00 20 20 20 20 72 6f |ze 30*TS|". ro|
|00001780| 74 61 74 65 20 58 2c 52 | 49 47 48 54 45 4c 42 4f |tate X,R|IGHTELBO|
|00001790| 57 20 2b 20 52 49 47 48 | 54 41 52 4d 36 00 20 20 |W + RIGH|TARM6. |
|000017a0| 20 20 63 79 6c 69 6e 64 | 65 72 20 59 2c 58 2c 5a | cylind|er Y,X,Z|
|000017b0| 2c 51 20 61 74 20 30 2c | 30 2c 30 20 73 69 7a 65 |,Q at 0,|0,0 size|
|000017c0| 20 2d 31 36 30 2a 54 53 | 2c 33 30 2a 54 53 2c 32 | -160*TS|,30*TS,2|
|000017d0| 30 2a 54 53 00 00 0a 00 | 6c 61 62 65 6c 20 48 41 |0*TS....|label HA|
|000017e0| 4e 44 1c 00 20 20 20 20 | 70 6f 6c 61 72 20 58 2c |ND.. |polar X,|
|000017f0| 2d 31 36 30 2a 54 53 2c | 52 49 47 48 54 41 52 4d |-160*TS,|RIGHTARM|
|00001800| 29 00 20 20 20 20 70 6f | 6c 61 72 20 58 2c 2d 31 |). po|lar X,-1|
|00001810| 36 30 2a 54 53 2c 52 49 | 47 48 54 45 4c 42 4f 57 |60*TS,RI|GHTELBOW|
|00001820| 20 2b 20 52 49 47 48 54 | 41 52 4d 22 00 20 20 20 | + RIGHT|ARM". |
|00001830| 20 73 70 68 65 72 65 20 | 50 2c 51 20 61 74 20 30 | sphere |P,Q at 0|
|00001840| 2c 30 2c 30 20 73 69 7a | 65 20 32 30 2a 54 53 22 |,0,0 siz|e 20*TS"|
|00001850| 00 20 20 20 20 72 6f 74 | 61 74 65 20 58 2c 52 49 |. rot|ate X,RI|
|00001860| 47 48 54 45 4c 42 4f 57 | 20 2b 20 52 49 47 48 54 |GHTELBOW| + RIGHT|
|00001870| 41 52 4d 11 00 20 20 20 | 20 72 6f 74 61 74 65 20 |ARM.. | rotate |
|00001880| 59 2c 2d 39 30 f8 20 00 | 20 20 20 20 66 6f 72 20 |Y,-90. .| for |
|00001890| 41 20 3d 20 2d 32 30 f8 | 20 74 6f 20 32 30 f8 20 |A = -20.| to 20. |
|000018a0| 73 74 65 70 20 32 30 f8 | 12 00 20 20 20 20 20 20 |step 20.|.. |
|000018b0| 20 20 72 6f 74 61 74 65 | 20 5a 2c 41 39 00 20 20 | rotate| Z,A9. |
|000018c0| 20 20 20 20 20 20 63 79 | 6c 69 6e 64 65 72 20 59 | cy|linder Y|
|000018d0| 2c 58 2c 5a 2c 51 20 61 | 74 20 30 2c 30 2c 30 20 |,X,Z,Q a|t 0,0,0 |
|000018e0| 73 69 7a 65 20 2d 38 30 | 2a 54 53 2c 32 30 2a 54 |size -80|*TS,20*T|
|000018f0| 53 2c 31 30 2a 54 53 16 | 00 20 20 20 20 20 20 20 |S,10*TS.|. |
|00001900| 20 73 68 69 66 74 20 59 | 2c 2d 38 30 2a 54 53 14 | shift Y|,-80*TS.|
|00001910| 00 20 20 20 20 20 20 20 | 20 72 6f 74 61 74 65 20 |. | rotate |
|00001920| 58 2c 33 30 f8 35 00 20 | 20 20 20 20 20 20 20 63 |X,30.5. | c|
|00001930| 79 6c 69 6e 64 65 72 20 | 59 2c 58 2c 5a 2c 51 20 |ylinder |Y,X,Z,Q |
|00001940| 61 74 20 30 2c 30 2c 30 | 20 73 69 7a 65 20 2d 36 |at 0,0,0| size -6|
|00001950| 30 2a 54 53 2c 31 30 2a | 54 53 2c 30 54 41 49 4c |0*TS,10*|TS,0TAIL|
|00001960| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00001970| 20 20 20 20 20 20 20 20 | 20 20 20 20 11 00 00 00 | | ....|
|00001980| 14 00 73 65 74 20 54 41 | 49 4c 53 57 49 4e 47 20 |..set TA|ILSWING |
|00001990| 3d 20 2d 32 30 f8 00 00 | 0e 00 73 68 69 66 74 20 |= -20...|..shift |
|000019a0| 59 2c 48 49 45 47 48 54 | 19 00 72 6f 74 61 74 65 |Y,HIEGHT|..rotate|
|000019b0| 20 58 2c 42 4f 44 59 42 | 45 4e 44 2f 32 20 2b 20 | X,BODYB|END/2 + |
|000019c0| 34 30 f8 00 00 15 00 64 | 72 61 77 20 4c 20 3d 20 |40.....d|raw L = |
|000019d0| 30 20 74 6f 20 31 32 30 | 30 2a 54 53 21 00 20 20 |0 to 120|0*TS!. |
|000019e0| 20 20 57 20 3d 20 4c 20 | 2f 20 28 31 32 30 30 2a | W = L |/ (1200*|
|000019f0| 54 53 29 20 2a 20 54 41 | 49 4c 53 57 49 4e 47 15 |TS) * TA|ILSWING.|
|00001a00| 00 20 20 20 20 55 20 3d | 20 4c 20 2f 20 e3 20 2a |. U =| L / . *|
|00001a10| 20 73 69 6e 20 57 11 00 | 20 20 20 20 56 20 3d 20 | sin W..| V = |
|00001a20| 4c 20 2a 20 63 6f 73 20 | 57 14 00 20 20 20 20 52 |L * cos |W.. R|
|00001a30| 20 3d 20 31 35 30 2a 54 | 53 20 2d 20 4c 2f 38 0c | = 150*T|S - L/8.|
|00001a40| 00 20 20 20 20 72 61 64 | 69 61 6c 20 52 16 00 20 |. rad|ial R.. |
|00001a50| 20 20 20 64 72 61 77 20 | 50 20 3d 20 30 20 74 6f | draw |P = 0 to|
|00001a60| 20 33 36 30 f8 15 00 20 | 20 20 20 20 20 20 20 5a | 360... | Z|
|00001a70| 20 3d 20 52 20 2a 20 73 | 69 6e 20 50 15 00 20 20 | = R * s|in P.. |
|00001a80| 20 20 20 20 20 20 43 20 | 3d 20 52 20 2a 20 63 6f | C |= R * co|
|00001a90| 73 20 50 1d 00 20 20 20 | 20 20 20 20 20 58 20 3d |s P.. | X =|
|00001aa0| 20 43 20 2a 20 63 6f 73 | 20 28 32 2a 57 29 20 2b | C * cos| (2*W) +|
|00001ab0| 20 55 1d 00 20 20 20 20 | 20 20 20 20 59 20 3d 20 | U.. | Y = |
|00001ac0| 43 20 2a 20 73 69 6e 20 | 28 32 2a 57 29 20 2d 20 |C * sin |(2*W) - |
|00001ad0| 56 c4 00 20 7a 20 7a 20 | 7a 20 7a 20 7a 20 7a 20 |V.. z z |z z z z |
|00001ae0| 7a 20 7a 20 7a 20 7a 20 | 7a 20 7a 20 7a 20 7a 20 |z z z z |z z z z |
|00001af0| 7a 00 00 53 54 41 4e 44 | 49 4e 47 00 20 20 20 20 |z..STAND|ING. |
|00001b00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001b10| 20 20 20 22 00 00 00 0c | 00 73 65 74 20 50 4f 53 | "....|.set POS|
|00001b20| 45 20 3d 20 31 00 00 1b | 00 48 45 41 44 42 45 4e |E = 1...|.HEADBEN|
|00001b30| 44 20 3d 20 39 30 f8 20 | 2d 20 33 30 f8 20 2a 20 |D = 90. |- 30. * |
|00001b40| 50 4f 53 45 0d 00 48 45 | 41 44 54 57 49 53 54 20 |POSE..HE|ADTWIST |
|00001b50| 3d 20 30 16 00 4e 45 43 | 4b 42 45 4e 44 20 3d 20 |= 0..NEC|KBEND = |
|00001b60| 2d 32 30 f8 20 2a 20 50 | 4f 53 45 15 00 42 4f 44 |-20. * P|OSE..BOD|
|00001b70| 59 42 45 4e 44 20 3d 20 | 36 30 f8 20 2a 20 50 4f |YBEND = |60. * PO|
|00001b80| 53 45 00 00 0b 00 4c 45 | 47 4f 55 54 20 3d 20 32 |SE....LE|GOUT = 2|
|00001b90| f8 0e 00 4c 45 47 54 57 | 49 53 54 20 3d 20 31 30 |...LEGTW|IST = 10|
|00001ba0| f8 15 00 4c 45 46 54 4c | 45 47 20 3d 20 2d 35 30 |...LEFTL|EG = -50|
|00001bb0| f8 20 2a 20 50 4f 53 45 | 15 00 4c 45 46 54 4b 4e |. * POSE|..LEFTKN|
|00001bc0| 45 45 20 3d 20 36 30 f8 | 20 2a 20 50 4f 53 45 16 |EE = 60.| * POSE.|
|00001bd0| 00 52 49 47 48 54 4c 45 | 47 20 3d 20 2d 35 30 f8 |.RIGHTLE|G = -50.|
|00001be0| 20 2a 20 50 4f 53 45 16 | 00 52 49 47 48 54 4b 4e | * POSE.|.RIGHTKN|
|00001bf0| 45 45 20 3d 20 36 30 f8 | 20 2a 20 50 4f 53 45 10 |EE = 60.| * POSE.|
|00001c00| 00 48 49 50 4c 45 46 54 | 20 3d 20 2d 32 35 2a 54 |.HIPLEFT| = -25*T|
|00001c10| 53 11 00 48 49 50 52 49 | 47 48 54 20 3d 20 2d 32 |S..HIPRI|GHT = -2|
|00001c20| 35 2a 54 53 00 00 0f 00 | 4c 41 52 4d 54 57 49 53 |5*TS....|LARMTWIS|
|00001c30| 54 20 3d 20 33 35 f8 10 | 00 52 41 52 4d 54 57 49 |T = 35..|.RARMTWI|
|00001c40| 53 54 20 3d 20 2d 33 35 | f8 0c 00 41 52 4d 4f 55 |ST = -35|...ARMOU|
|00001c50| 54 20 3d 20 36 30 f8 0e | 00 4c 45 46 54 41 52 4d |T = 60..|.LEFTARM|
|00001c60| 20 3d 20 2d 32 30 f8 10 | 00 4c 45 46 54 45 4c 42 | = -20..|.LEFTELB|
|00001c70| 4f 57 20 3d 20 2d 37 30 | f8 0f 00 52 49 47 48 54 |OW = -70|...RIGHT|
|00001c80| 41 52 4d 20 3d 20 2d 32 | 30 f8 11 00 52 49 47 48 |ARM = -2|0...RIGH|
|00001c90| 54 45 4c 42 4f 57 20 3d | 20 2d 37 30 f8 00 00 0d |TELBOW =| -70....|
|00001ca0| 00 4a 41 57 4f 50 45 4e | 20 3d 20 31 35 f8 0e 00 |.JAWOPEN| = 15...|
|00001cb0| 54 41 49 4c 53 57 49 4e | 47 20 3d 20 30 f8 00 00 |TAILSWIN|G = 0...|
|00001cc0| 65 00 41 20 3d 20 33 30 | 30 2a 54 53 20 2a 20 63 |e.A = 30|0*TS * c|
|00001cd0| 6f 73 20 4c 45 46 54 4c | 45 47 20 2b 20 34 30 30 |os LEFTL|EG + 400|
|00001ce0| 2a 54 53 20 2a 20 63 6f | 73 20 28 4c 45 46 54 4c |*TS * co|s (LEFTL|
|00001cf0| 45 47 2b 4c 45 46 54 4b | 4e 45 45 29 20 2b 20 38 |EG+LEFTK|NEE) + 8|
|00001d00| 30 2a 54 53 20 2a 20 73 | 69 6e 20 28 4c 45 46 54 |0*TS * s|in (LEFT|
|00001d10| 4c 45 47 2b 4c 45 46 54 | 4b 4e 45 45 29 20 2d 20 |LEG+LEFT|KNEE) - |
|00001d20| 48 49 50 4c 45 46 54 6d | 00 42 20 3d 20 33 30 30 |HIPLEFTm|.B = 300|
|00001d30| 2a 54 53 20 2a 20 63 6f | 73 20 52 49 47 48 54 4c |*TS * co|s RIGHTL|
|00001d40| 45 47 20 2b 20 34 30 30 | 2a 54 53 20 2a 20 63 6f |EG + 400|*TS * co|
|00001d50| 73 20 28 52 49 47 48 54 | 4c 45 47 2b 52 49 47 48 |s (RIGHT|LEG+RIGH|
|00001d60| 54 4b 4e 45 45 29 20 2b | 20 38 30 2a 54 53 20 2a |TKNEE) +| 80*TS *|
|00001d70| 20 73 69 6e 20 28 52 49 | 47 48 54 4c 45 47 20 2b | sin (RI|GHTLEG +|
|00001d80| 20 52 49 47 48 54 4b 4e | 45 45 29 20 2d 20 48 49 | RIGHTKN|EE) - HI|
|00001d90| 50 52 49 47 48 54 09 00 | 69 66 20 41 20 3e 3d 20 |PRIGHT..|if A >= |
|00001da0| 42 0e 00 20 20 20 20 48 | 49 45 47 48 54 20 3d 20 |B.. H|IEGHT = |
|00001db0| 41 04 00 65 6c 73 65 0e | 00 20 20 20 20 68 69 65 |A..else.|. hie|
|00001dc0| 67 68 74 20 3d 20 42 52 | 55 4e 4e 49 4e 47 00 20 |ght = BR|UNNING. |
|00001dd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001de0| 20 20 20 20 20 20 20 22 | 00 00 00 0f 00 73 65 74 | "|.....set|
|00001df0| 20 52 55 4e 54 49 4d 45 | 20 3d 20 30 0e 00 73 65 | RUNTIME| = 0..se|
|00001e00| 74 20 53 54 52 49 44 45 | 20 3d 20 31 00 00 17 00 |t STRIDE| = 1....|
|00001e10| 50 20 3d 20 33 36 30 f8 | 20 2a 20 66 72 61 63 20 |P = 360.| * frac |
|00001e20| 52 55 4e 54 49 4d 45 1b | 00 51 20 3d 20 33 36 30 |RUNTIME.|.Q = 360|
|00001e30| f8 20 2a 20 66 72 61 63 | 20 28 52 55 4e 54 49 4d |. * frac| (RUNTIM|
|00001e40| 45 2f 32 29 00 00 23 00 | 48 45 41 44 54 57 49 53 |E/2)..#.|HEADTWIS|
|00001e50| 54 20 3d 20 48 45 41 44 | 54 57 49 53 54 20 2b 20 |T = HEAD|TWIST + |
|00001e60| 34 30 f8 20 2a 20 73 69 | 6e 20 51 2d 00 4e 45 43 |40. * si|n Q-.NEC|
|00001e70| 4b 42 45 4e 44 20 3d 20 | 4e 45 43 4b 42 45 4e 44 |KBEND = |NECKBEND|
|00001e80| 20 2b 20 38 f8 20 2a 20 | 73 69 6e 20 28 32 2a 50 | + 8. * |sin (2*P|
|00001e90| 29 20 2a 20 53 54 52 49 | 44 45 2e 00 42 4f 44 59 |) * STRI|DE..BODY|
|00001ea0| 42 45 4e 44 20 3d 20 42 | 4f 44 59 42 45 4e 44 20 |BEND = B|ODYBEND |
|00001eb0| 2d 20 31 30 f8 20 2a 20 | 73 69 6e 20 28 32 2a 50 |- 10. * |sin (2*P|
|00001ec0| 29 20 2a 20 53 54 52 49 | 44 45 00 00 28 00 4c 45 |) * STRI|DE..(.LE|
|00001ed0| 46 54 4c 45 47 20 3d 20 | 4c 45 46 54 4c 45 47 20 |FTLEG = |LEFTLEG |
|00001ee0| 2b 20 36 30 f8 20 2a 20 | 63 6f 73 20 50 20 2a 20 |+ 60. * |cos P * |
|00001ef0| 53 54 52 49 44 45 2a 00 | 4c 45 46 54 4b 4e 45 45 |STRIDE*.|LEFTKNEE|
|00001f00| 20 3d 20 4c 45 46 54 4b | 4e 45 45 20 2b 20 35 30 | = LEFTK|NEE + 50|
|00001f10| f8 20 2a 20 73 69 6e 20 | 50 20 2a 20 53 54 52 49 |. * sin |P * STRI|
|00001f20| 44 45 2a 00 52 49 47 48 | 54 4c 45 47 20 3d 20 52 |DE*.RIGH|TLEG = R|
|00001f30| 49 47 48 54 4c 45 47 20 | 2d 20 36 30 f8 20 2a 20 |IGHTLEG |- 60. * |
|00001f40| 63 6f 73 20 50 20 2a 20 | 53 54 52 49 44 45 2c 00 |cos P * |STRIDE,.|
|00001f50| 52 49 47 48 54 4b 4e 45 | 45 20 3d 20 52 49 47 48 |RIGHTKNE|E = RIGH|
|00001f60| 54 4b 4e 45 45 20 2d 20 | 35 30 f8 20 2a 20 73 69 |TKNEE - |50. * si|
|00001f70| 6e 20 50 20 2a 20 53 54 | 52 49 44 45 2a 00 48 49 |n P * ST|RIDE*.HI|
|00001f80| 50 4c 45 46 54 20 3d 20 | 48 49 50 4c 45 46 54 20 |PLEFT = |HIPLEFT |
|00001f90| 2d 20 35 30 2a 54 53 20 | 2a 20 73 69 6e 20 50 20 |- 50*TS |* sin P |
|00001fa0| 2a 20 53 54 52 49 44 45 | 2c 00 48 49 50 52 49 47 |* STRIDE|,.HIPRIG|
|00001fb0| 48 54 20 3d 20 48 49 50 | 52 49 47 48 54 20 2b 20 |HT = HIP|RIGHT + |
|00001fc0| 35 30 2a 54 53 20 2a 20 | 73 69 6e 20 50 20 2a 20 |50*TS * |sin P * |
|00001fd0| 53 54 52 49 44 45 00 00 | 28 00 4c 45 46 54 41 52 |STRIDE..|(.LEFTAR|
|00001fe0| 4d 20 3d 20 4c 45 46 54 | 41 52 4d 20 2d 20 33 30 |M = LEFT|ARM - 30|
|00001ff0| f8 20 2a 20 63 6f 73 20 | 50 20 2a 20 53 54 52 49 |. * cos |P * STRI|
|00002000| 44 45 2c 00 4c 45 46 54 | 45 4c 42 4f 57 20 3d 20 |DE,.LEFT|ELBOW = |
|00002010| 4c 45 46 54 45 4c 42 4f | 57 20 2b 20 32 30 f8 20 |LEFTELBO|W + 20. |
|00002020| 2a 20 73 69 6e 20 50 20 | 2a 20 53 54 52 49 44 45 |* sin P |* STRIDE|
|00002030| 2a 00 52 49 47 48 54 41 | 52 4d 20 3d 20 52 49 47 |*.RIGHTA|RM = RIG|
|00002040| 48 54 41 52 4d 20 2b 20 | 33 30 f8 20 2a 20 63 6f |HTARM + |30. * co|
|00002050| 73 20 50 20 2a 20 53 54 | 52 49 44 45 2e 00 52 49 |s P * ST|RIDE..RI|
|00002060| 47 48 54 45 4c 42 4f 57 | 20 3d 20 52 49 47 48 54 |GHTELBOW| = RIGHT|
|00002070| 45 4c 42 4f 57 20 2d 20 | 32 30 f8 20 2a 20 73 69 |ELBOW - |20. * si|
|00002080| 6e 20 50 20 2a 20 53 54 | 52 49 44 45 00 00 20 00 |n P * ST|RIDE.. .|
|00002090| 54 41 49 4c 53 57 49 4e | 47 20 3d 20 35 30 f8 20 |TAILSWIN|G = 50. |
|000020a0| 2a 20 73 69 6e 20 50 20 | 2a 20 53 54 52 49 44 45 |* sin P |* STRIDE|
|000020b0| 00 00 65 00 41 20 3d 20 | 33 30 30 2a 54 53 20 2a |..e.A = |300*TS *|
|000020c0| 20 63 6f 73 20 4c 45 46 | 54 4c 45 47 20 2b 20 34 | cos LEF|TLEG + 4|
|000020d0| 30 30 2a 54 53 20 2a 20 | 63 6f 73 20 28 4c 45 46 |00*TS * |cos (LEF|
|000020e0| 54 4c 45 47 2b 4c 45 46 | 54 4b 4e 45 45 29 20 2b |TLEG+LEF|TKNEE) +|
|000020f0| 20 38 30 2a 54 53 20 2a | 20 73 69 6e 20 28 4c 45 | 80*TS *| sin (LE|
|00002100| 46 54 4c 45 47 2b 4c 45 | 46 54 4b 4e 45 45 29 20 |FTLEG+LE|FTKNEE) |
|00002110| 2d 20 48 49 50 4c 45 46 | 54 6d 00 42 20 3d 20 33 |- HIPLEF|Tm.B = 3|
|00002120| 30 30 2a 54 53 20 2a 20 | 63 6f 73 20 52 49 47 48 |00*TS * |cos RIGH|
|00002130| 54 4c 45 47 20 2b 20 34 | 30 30 2a 54 53 20 2a 20 |TLEG + 4|00*TS * |
|00002140| 63 6f 73 20 28 52 49 47 | 48 54 4c 45 47 2b 52 49 |cos (RIG|HTLEG+RI|
|00002150| 47 48 54 4b 4e 45 45 29 | 20 2b 20 38 30 2a 54 53 |GHTKNEE)| + 80*TS|
|00002160| 20 2a 20 73 69 6e 20 28 | 52 49 47 48 54 4c 45 47 | * sin (|RIGHTLEG|
|00002170| 20 2b 20 52 49 47 48 54 | 4b 4e 45 45 29 20 2d 20 | + RIGHT|KNEE) - |
|00002180| 48 49 50 52 49 47 48 54 | 00 00 09 00 69 66 20 41 |HIPRIGHT|....if A|
|00002190| 20 3e 3d 20 42 0e 00 20 | 20 20 20 48 49 45 47 48 | >= B.. | HIEGH|
|000021a0| 54 20 3d 20 41 04 00 65 | 6c 73 65 0e 00 20 20 20 |T = A..e|lse.. |
|000021b0| 20 68 69 65 67 68 74 20 | 3d 20 42 00 00 21 00 54 | hieght |= B..!.T|
|000021c0| 52 45 58 4d 4f 56 45 20 | 3d 20 31 36 35 30 2a 54 |REXMOVE |= 1650*T|
|000021d0| 53 20 2a 20 53 54 52 49 | 44 45 20 2a 20 69 6e 63 |S * STRI|DE * inc|
|000021e0| 52 4f 41 52 49 4e 47 00 | 20 20 20 20 20 20 20 20 |ROARING.| |
|000021f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002200| 1e 00 00 00 19 00 50 20 | 3d 20 33 36 30 f8 20 2a |......P |= 360. *|
|00002210| 20 66 72 61 63 20 28 72 | 75 6e 74 69 6d 65 29 1b | frac (r|untime).|
|00002220| 00 53 20 3d 20 33 36 30 | f8 20 2a 20 66 72 61 63 |.S = 360|. * frac|
|00002230| 20 28 72 75 6e 74 69 6d | 65 2f 32 29 1b 00 51 20 | (runtim|e/2)..Q |
|00002240| 3d 20 33 36 30 f8 20 2a | 20 66 72 61 63 20 28 72 |= 360. *| frac (r|
|00002250| 75 6e 74 69 6d 65 2f 34 | 29 00 00 21 00 48 45 41 |untime/4|)..!.HEA|
|00002260| 44 42 45 4e 44 20 3d 20 | 68 65 61 64 62 65 6e 64 |DBEND = |headbend|
|00002270| 20 2d 20 32 35 f8 20 2a | 20 73 69 6e 20 51 23 00 | - 25. *| sin Q#.|
|00002280| 48 45 41 44 54 57 49 53 | 54 20 3d 20 68 65 61 64 |HEADTWIS|T = head|
|00002290| 74 77 69 73 74 20 2b 20 | 35 30 f8 20 2a 20 73 69 |twist + |50. * si|
|000022a0| 6e 20 50 21 00 4e 45 43 | 4b 42 45 4e 44 20 3d 20 |n P!.NEC|KBEND = |
|000022b0| 6e 65 63 6b 62 65 6e 64 | 20 2b 20 31 35 f8 20 2a |neckbend| + 15. *|
|000022c0| 20 73 69 6e 20 51 21 00 | 42 4f 44 59 42 45 4e 44 | sin Q!.|BODYBEND|
|000022d0| 20 3d 20 62 6f 64 79 62 | 65 6e 64 20 2b 20 31 35 | = bodyb|end + 15|
|000022e0| f8 20 2a 20 73 69 6e 20 | 51 00 00 1f 00 4c 45 46 |. * sin |Q....LEF|
|000022f0| 54 4c 45 47 20 3d 20 6c | 65 66 74 6c 65 67 20 2d |TLEG = l|eftleg -|
|00002300| 20 33 30 f8 20 2a 20 73 | 69 6e 20 51 21 00 4c 45 | 30. * s|in Q!.LE|
|00002310| 46 54 4b 4e 45 45 20 3d | 20 6c 65 66 74 6b 6e 65 |FTKNEE =| leftkne|
|00002320| 65 20 2b 20 35 35 f8 20 | 2a 20 73 69 6e 20 51 21 |e + 55. |* sin Q!|
|00002330| 00 52 49 47 48 54 4c 45 | 47 20 3d 20 72 69 67 68 |.RIGHTLE|G = righ|
|00002340| 74 6c 65 67 20 2d 20 33 | 30 f8 20 2a 20 73 69 6e |tleg - 3|0. * sin|
|00002350| 20 51 23 00 52 49 47 48 | 54 4b 4e 45 45 20 3d 20 | Q#.RIGH|TKNEE = |
|00002360| 72 69 67 68 74 6b 6e 65 | 65 20 2b 20 35 35 f8 20 |rightkne|e + 55. |
|00002370| 2a 20 73 69 6e 20 51 00 | 00 26 00 4c 45 46 54 41 |* sin Q.|.&.LEFTA|
|00002380| 52 4d 20 3d 20 6c 65 66 | 74 61 72 6d 20 2d 20 32 |RM = lef|tarm - 2|
|00002390| 30 f8 20 2a 20 63 6f 73 | 20 50 20 2a 20 72 6f 61 |0. * cos| P * roa|
|000023a0| 72 23 00 4c 45 46 54 45 | 4c 42 4f 57 20 3d 20 6c |r#.LEFTE|LBOW = l|
|000023b0| 65 66 74 65 6c 62 6f 77 | 20 2b 20 32 30 f8 20 2a |eftelbow| + 20. *|
|000023c0| 20 73 69 6e 20 50 2a 00 | 6c 61 72 6d 74 77 69 73 | sin P*.|larmtwis|
|000023d0| 74 20 3d 20 6c 61 72 6d | 74 77 69 73 74 20 2b 20 |t = larm|twist + |
|000023e0| 33 30 f8 20 2a 20 63 6f | 73 20 50 20 2a 20 72 6f |30. * co|s P * ro|
|000023f0| 61 72 28 00 52 49 47 48 | 54 41 52 4d 20 3d 20 72 |ar(.RIGH|TARM = r|
|00002400| 69 67 68 74 61 72 6d 20 | 2b 20 32 30 f8 20 2a 20 |ightarm |+ 20. * |
|00002410| 63 6f 73 20 50 20 2a 20 | 72 6f 61 72 25 00 52 49 |cos P * |roar%.RI|
|00002420| 47 48 54 45 4c 42 4f 57 | 20 3d 20 72 69 67 68 74 |GHTELBOW| = right|
|00002430| 65 6c 62 6f 77 20 2d 20 | 32 30 f8 20 2a 20 73 69 |elbow - |20. * si|
|00002440| 6e 20 50 2a 00 72 61 72 | 6d 74 77 69 73 74 20 3d |n P*.rar|mtwist =|
|00002450| 20 72 61 72 6d 74 77 69 | 73 74 20 2b 20 33 30 f8 | rarmtwi|st + 30.|
|00002460| 20 2a 20 63 6f 73 20 50 | 20 2a 20 72 6f 61 72 00 | * cos P| * roar.|
|00002470| 00 25 00 4a 41 57 4f 50 | 45 4e 20 3d 20 6a 61 77 |.%.JAWOP|EN = jaw|
|00002480| 6f 70 65 6e 20 2b 20 32 | 35 f8 20 2a 20 28 31 20 |open + 2|5. * (1 |
|00002490| 2d 20 63 6f 73 20 53 29 | 00 00 65 00 41 20 3d 20 |- cos S)|..e.A = |
|000024a0| 33 30 30 2a 54 53 20 2a | 20 63 6f 73 20 4c 45 46 |300*TS *| cos LEF|
|000024b0| 54 4c 45 47 20 2b 20 34 | 30 30 2a 54 53 20 2a 20 |TLEG + 4|00*TS * |
|000024c0| 63 6f 73 20 28 4c 45 46 | 54 4c 45 47 2b 4c 45 46 |cos (LEF|TLEG+LEF|
|000024d0| 54 4b 4e 45 45 29 20 2b | 20 38 30 2a 54 53 20 2a |TKNEE) +| 80*TS *|
|000024e0| 20 73 69 6e 20 28 4c 45 | 46 54 4c 45 47 2b 4c 45 | sin (LE|FTLEG+LE|
|000024f0| 46 54 4b 4e 45 45 29 20 | 2d 20 48 49 50 4c 45 46 |FTKNEE) |- HIPLEF|
|00002500| 54 6d 00 42 20 3d 20 33 | 30 30 2a 54 53 20 2a 20 |Tm.B = 3|00*TS * |
|00002510| 63 6f 73 20 52 49 47 48 | 54 4c 45 47 20 2b 20 34 |cos RIGH|TLEG + 4|
|00002520| 30 30 2a 54 53 20 2a 20 | 63 6f 73 20 28 52 49 47 |00*TS * |cos (RIG|
|00002530| 48 54 4c 45 47 2b 52 49 | 47 48 54 4b 4e 45 45 29 |HTLEG+RI|GHTKNEE)|
|00002540| 20 2b 20 38 30 2a 54 53 | 20 2a 20 73 69 6e 20 28 | + 80*TS| * sin (|
|00002550| 52 49 47 48 54 4c 45 47 | 20 2b 20 52 49 47 48 54 |RIGHTLEG| + RIGHT|
|00002560| 4b 4e 45 45 29 20 2d 20 | 48 49 50 52 49 47 48 54 |KNEE) - |HIPRIGHT|
|00002570| 09 00 69 66 20 41 20 3e | 3d 20 42 0e 00 20 20 20 |..if A >|= B.. |
|00002580| 20 48 49 45 47 48 54 20 | 3d 20 41 04 00 65 6c 73 | HIEGHT |= A..els|
|00002590| 65 0e 00 20 20 20 20 68 | 69 65 67 68 74 20 3d 20 |e.. h|ieght = |
|000025a0| 42 09 00 63 6f 6c 6f 72 | 20 31 35 39 08 00 6c 75 |B..color| 159..lu|
|000025b0| 73 74 65 72 20 31 09 00 | 71 75 61 6c 69 74 79 20 |ster 1..|quality |
|000025c0| 34 06 00 54 53 20 3d 20 | 31 00 00 12 00 63 6f 6d |4..TS = |1....com|
|000025d0| 70 69 6c 65 20 22 53 54 | 41 4e 44 49 4e 47 22 11 |pile "ST|ANDING".|
|000025e0| 00 63 6f 6d 70 69 6c 65 | 20 22 52 55 4e 4e 49 4e |.compile| "RUNNIN|
|000025f0| 47 22 07 00 63 6f 6d 70 | 69 6c 65 15 00 70 6f 73 |G"..comp|ile..pos|
|00002600| 69 74 69 6f 6e 20 30 2c | 31 30 30 30 2c 2d 34 30 |ition 0,|1000,-40|
|00002610| 30 30 14 00 64 69 72 65 | 63 74 69 6f 6e 20 30 2c |00..dire|ction 0,|
|00002620| 38 30 30 2c 2d 32 30 30 | 12 00 6c 69 67 68 74 20 |800,-200|..light |
|00002630| 31 65 34 2c 31 65 34 2c | 2d 31 65 34 00 00 00 04 |1e4,1e4,|-1e4....|
|00002640| 04 04 08 08 08 0c 0c 0c | 10 10 10 15 15 15 19 19 |........|........|
|00002650| 19 1d 1d 1d 21 21 21 25 | 25 25 2a 2a 2a 2e 2e 2e |....!!!%|%%***...|
|00002660| 32 32 32 36 36 36 3a 3a | 3a 3f 3f 3f 05 00 00 0b |222666::|:???....|
|00002670| 00 00 11 00 00 16 00 00 | 1c 00 00 22 00 00 28 00 |........|..."..(.|
|00002680| 00 2d 00 00 33 00 00 39 | 00 00 3f 00 00 3f 0a 0a |.-..3..9|..?..?..|
|00002690| 3f 15 15 3f 1f 1f 3f 2a | 2a 3f 34 34 05 03 00 0b |?..?..?*|*?44....|
|000026a0| 06 00 11 09 00 16 0c 00 | 1c 0f 00 22 12 00 28 15 |........|..."..(.|
|000026b0| 00 2d 18 00 33 1b 00 39 | 1e 00 3f 22 00 3f 26 0a |.-..3..9|..?".?&.|
|000026c0| 3f 2b 15 3f 30 1f 3f 35 | 2a 3f 3a 34 05 05 00 0b |?+.?0.?5|*?:4....|
|000026d0| 0a 00 11 0f 00 16 14 00 | 1c 19 00 22 1e 00 28 23 |........|..."..(#|
|000026e0| 00 2d 28 00 33 2d 00 39 | 32 00 3f 37 00 3f 38 0a |.-(.3-.9|2.?7.?8.|
|000026f0| 3f 39 15 3f 3b 1f 3f 3c | 2a 3f 3d 34 00 05 00 00 |?9.?;.?<|*?=4....|
|00002700| 0b 00 00 11 00 00 16 00 | 00 1c 00 00 22 00 00 28 |........|...."..(|
|00002710| 00 00 2d 00 00 33 00 00 | 39 00 00 3f 00 0a 3f 0a |..-..3..|9..?..?.|
|00002720| 15 3f 15 1f 3f 1f 2a 3f | 2a 34 3f 34 00 04 05 00 |.?..?.*?|*4?4....|
|00002730| 08 0b 00 0d 11 00 11 16 | 00 15 1c 00 1a 22 00 1e |........|....."..|
|00002740| 28 00 22 2d 00 27 33 00 | 2b 39 00 30 3f 0a 32 3f |(."-.'3.|+9.0?.2?|
|00002750| 15 35 3f 1f 37 3f 2a 3a | 3f 34 3c 3f 00 01 05 00 |.5?.7?*:|?4<?....|
|00002760| 02 0b 00 03 11 00 04 16 | 00 05 1c 00 06 22 00 07 |........|....."..|
|00002770| 28 00 08 2d 00 09 33 00 | 0a 39 00 0c 3f 0a 14 3f |(..-..3.|.9..?..?|
|00002780| 15 1d 3f 1f 25 3f 2a 2e | 3f 34 36 3f 05 00 03 05 |..?.%?*.|?46?....|
|00002790| 00 03 04 00 03 03 00 02 | 03 00 02 02 00 01 01 00 |........|........|
|000027a0| 01 00 00 00 28 0f 14 2d | 0f 14 32 0f 14 37 0f 14 |....(..-|..2..7..|
|000027b0| 3f 19 00 3f 1e 00 3f 25 | 00 3f 2c 00 0f 0f 00 12 |?..?..?%|.?,.....|
|000027c0| 10 01 15 12 02 19 14 04 | 1c 16 05 20 17 07 23 19 |........|... ..#.|
|000027d0| 08 26 1b 09 2a 1d 0b 2d | 1e 0c 31 20 0e 34 22 0f |.&..*..-|..1 .4".|
|000027e0| 36 21 0e 39 20 0d 3c 1f | 0c 3f 1e 0a 00 0a 00 04 |6!.9 .<.|.?......|
|000027f0| 0b 00 09 0d 00 0e 0e 00 | 13 10 00 18 11 00 1d 13 |........|........|
|00002800| 00 22 14 00 27 16 00 2c | 17 00 31 19 00 36 1b 00 |."..'..,|..1..6..|
|00002810| 37 1b 00 38 1a 00 39 19 | 00 3a 18 00 00 05 04 00 |7..8..9.|.:......|
|00002820| 07 05 00 09 07 00 0c 09 | 00 0e 0a 00 10 0c 00 13 |........|........|
|00002830| 0e 00 15 10 00 17 11 00 | 1a 13 00 1c 15 00 1e 18 |........|........|
|00002840| 00 20 1c 00 23 20 00 25 | 24 00 28 28 03 02 00 06 |. ..# .%|$.((....|
|00002850| 05 00 09 08 00 0f 0d 00 | 13 10 00 16 13 00 19 15 |........|........|
|00002860| 00 1f 1b 00 0c 0a 00 0e | 0c 00 10 0e 00 12 10 00 |........|........|
|00002870| 15 12 00 17 14 00 19 16 | 00 1c 18 00 0a 0a 00 0c |........|........|
|00002880| 0c 00 0f 0e 00 12 10 00 | 15 12 00 18 14 00 1b 16 |........|........|
|00002890| 00 1e 19 00 00 10 00 00 | 10 00 00 11 00 00 12 00 |........|........|
|000028a0| 00 13 00 00 14 00 00 15 | 00 00 16 00 28 0f 14 27 |........|....(..'|
|000028b0| 0f 14 25 0f 15 24 0f 15 | 22 10 16 21 10 16 1f 10 |..%..$..|"..!....|
|000028c0| 17 1d 11 18 1a 12 19 16 | 13 1a 13 14 1c 0f 15 1d |........|........|
|000028d0| 0b 16 1e 08 17 20 04 18 | 21 00 19 23 10 0a 00 11 |..... ..|!..#....|
|000028e0| 0d 00 12 10 00 13 14 00 | 14 16 00 10 0b 00 11 0f |........|........|
|000028f0| 00 12 12 00 3c 00 00 3c | 06 00 3c 0d 00 3d 14 00 |....<..<|..<..=..|
|00002900| 3d 1b 00 3e 22 00 3e 29 | 00 3f 30 00 10 0a 00 11 |=..>".>)|.?0.....|
|00002910| 0a 00 12 0b 00 13 0b 00 | 14 0c 00 16 0c 00 17 0d |........|........|
|00002920| 00 18 0d 00 19 0e 00 1a | 0e 00 1c 0f 00 1d 0f 00 |........|........|
|00002930| 1e 10 00 1f 10 00 20 11 | 00 22 12 00 |...... .|.".. |
+--------+-------------------------+-------------------------+--------+--------+